home *** CD-ROM | disk | FTP | other *** search
/ Belgian Amiga Club - ADF Collection / BS1 part 34.zip / BS1 part 34 / Digi-view 4.0 PAL.adf / Demo < prev    next >
AmigaDOS Script File  |  2018-01-18  |  3KB  |  134 lines
  1. .key LeaveThisHere
  2.  
  3. echo "*E[0;0H*E[41;30m*E[J"
  4. echo " "
  5. if not exists DV-Link/DoWeHaveMem
  6. echo "                   Can't find DV-Link Drawer on this disk"
  7. echo ""
  8. echo "           Copy DV-Link Drawer from Digi-View 4.0 disk and retry"
  9. wait 2
  10. skip NoMemory
  11. else
  12. DV-Link/DoWeHaveMem
  13. if warn
  14. echo "                Sorry - Demo requires 1 megabyte of memory"
  15. wait 2
  16. skip NoMemory
  17. endif
  18. endif
  19.  
  20. echo "                          --- DIGI-VIEW 4.0 DEMO ---  "
  21. copy DV-Link/DVLink RAM:
  22. copy C:Wait RAM:
  23. copy C:Echo RAM:
  24. RAM:echo ""
  25. RAM:echo "                               To exit this demo:"
  26. RAM:echo "                     Select QUIT from the menu in Digi-View"
  27. RAM:echo "                                    - OR -"
  28. RAM:echo "                    Press Left-Amiga N, to get to Workbench."
  29. RAM:echo "                      Then Double-Click the QuitDemo icon" 
  30. copy C:If RAM:
  31. copy C:Skip RAM:
  32. copy C:Delete RAM:
  33. copy C:Execute RAM:
  34.  
  35. RAM:echo ""
  36. RAM:DVLink quit   ;quit Digi-View to setup right mode
  37. run >NIL: DV 320 256 c
  38. RAM:echo "  Now Loading Digi-View .... "
  39. RAM:wait 8             ; Floppy delay, change for hard drive
  40. lab loop
  41. RAM:DVLink mbaw
  42. RAM:if warn
  43. RAM:wait 2
  44. RAM:skip loop back
  45. endif
  46.  
  47. failat 100
  48.  
  49. lab demoloop
  50.  
  51. RAM:DVLink clrs
  52. RAM:DVLink mlin
  53. RAM:DVLink cont 4
  54. RAM:DVLink brit -6
  55. RAM:if warn
  56. RAM:skip OuttaHere
  57. endif
  58. RAM:DVLink liff Images/Fashion
  59. RAM:DVLink cont 0
  60. RAM:DVLink brit 0
  61. RAM:if warn
  62. RAM:skip OuttaHere
  63. endif
  64. RAM:wait 1
  65.  
  66. RAM:DVLink mbaw
  67. RAM:if warn
  68. RAM:skip OuttaHere
  69. endif
  70. RAM:DVLink disp
  71. RAM:if warn
  72. RAM:skip OuttaHere
  73. endif
  74. RAM:wait 2
  75.  
  76. RAM:DVLink mcol
  77. RAM:DVLink npal 8
  78. RAM:if warn
  79. RAM:skip OuttaHere
  80. endif
  81. RAM:DVLink disp
  82. RAM:if warn
  83. RAM:skip OuttaHere
  84. endif
  85. RAM:wait 2
  86.  
  87. RAM:DVLink mhap
  88. RAM:if warn
  89. RAM:skip OuttaHere
  90. endif
  91. RAM:DVLink disp
  92. RAM:if warn
  93. RAM:skip OuttaHere
  94. endif
  95. RAM:wait 3
  96.  
  97. RAM:DVLink clrs
  98. RAM:DVLink mcol
  99. RAM:DVLink npal 16
  100. RAM:if warn
  101. RAM:skip OuttaHere
  102. endif
  103. RAM:DVLink liff Images/Groucho.DV
  104. RAM:if warn
  105. RAM:skip OuttaHere
  106. endif
  107. RAM:wait 1
  108.  
  109. RAM:DVLink mhap
  110. RAM:DVLink liff Images/Groucho.DP3
  111. RAM:if warn
  112. RAM:skip OuttaHere
  113. endif
  114. RAM:wait 3
  115.  
  116. RAM:skip demoloop back
  117.  
  118. lab OuttaHere
  119. RAM:echo " "
  120. RAM:echo ""
  121. RAM:echo "                    Thanks for running the Digi-View 4.0 Demo."
  122. RAM:echo ""
  123. RAM:echo "                       Now exiting demo ... Be Seeing You! "
  124.  
  125. RAM:delete RAM:echo
  126. RAM:delete RAM:execute
  127. RAM:delete RAM:wait
  128. RAM:delete RAM:skip
  129. RAM:delete RAM:DVLink
  130. RAM:delete RAM:if
  131. RAM:delete RAM:delete
  132.  
  133. lab NoMemory
  134.